Excel VBA QueryTable
がでる。
40,000行くらい
worksheetの上限超え, refreshでerrorだが、、、
参考
QueryTable.ResultRange.Rows.Count
[querytable.Delete - Programming Excel with VBA and .NET Book] code: delete_query_table.vba
Dim qt As QueryTable
For Each qt In ActiveSheet.QueryTables
If qt.Refreshing Then qt.CancelRefresh
qt.Delete
Next
ActiveSheet.UsedRange.Clear